#pragma once

#include <iostream>
#include <string>
#include "LockGuard.hpp"
#include "Log.hpp"
#include <netinet/in.h>
#include <arpa/inet.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <cstring>
#include "InetAddr.hpp"
#include <unistd.h>
#include <sys/wait.h>
#include <functional>

const static int gdefaultsockfd = -1;
const static int gbacklog = 16;

enum
{
    SOCK_ERROR = 1,
    BIND_ERROR,
    USAGE_ERROR,
    LISTEN_ERROR
};

class TcpServer; // 前置声明

class ThreadData
{
public:
    ThreadData(int fd, InetAddr addr, TcpServer *s)
        : sockfd(fd), clientaddr(addr), self(s)
    {
    }

public:
    int sockfd;
    InetAddr clientaddr;
    TcpServer *self;
};

using task_t = std::function<void()>; // service 一个一个任务都bind好了，成无参了
using func_t = std::function<std::string(const std::string &)>;

class TcpServer
{
public:
    TcpServer(uint16_t port, func_t func)
        : _listensockfd(gdefaultsockfd), _port(port), _isrunning(false), _func(func)
    {
    }
    // 初始化
    void InitServer()
    {
        // 1. 创建套接字
        _listensockfd = ::socket(AF_INET, SOCK_STREAM, 0);
        if (_listensockfd < 0)
        {
            LOG(FATAL, "sock error\n");
            exit(SOCK_ERROR);
        }
        LOG(DEBUG, "sock create success sockfd:%d\n", _listensockfd);

        // 2. 填充struct sockaddr_in
        struct sockaddr_in local;
        memset(&local, 0, sizeof(local));
        local.sin_family = AF_INET;
        local.sin_addr.s_addr = INADDR_ANY;
        local.sin_port = htons(_port);

        // 3. bind
        int n = ::bind(_listensockfd, (struct sockaddr *)&local, sizeof(local));
        if (n < 0)
        {
            LOG(FATAL, "bind error\n");
            exit(BIND_ERROR);
        }
        LOG(DEBUG, "bind success, sockfd is : %d\n", _listensockfd);

        // 4. tcp是面向连接的，所以通信之前，必须先建立连接。服务器是被连接的
        //    tcpserver 启动，未来首先要一直等待客户的连接到来
        // 监听listen套接字
        n = ::listen(_listensockfd, gbacklog);
        if (n < 0)
        {
            LOG(FATAL, "listen error\n");
            exit(LISTEN_ERROR);
        }
        LOG(DEBUG, "listen success, sockfd is : %d\n", _listensockfd);
    }
    // 每个客户端跑的函数
    void service(int sockfd, InetAddr client)
    {
        LOG(DEBUG, "get a new link, info %s:%d, fd : %d\n", client.Ip().c_str(), client.Port(), sockfd);

        std::string clientaddr = "[" + client.Ip() + ":" + std::to_string(client.Port()) + "]# ";
        while (true)
        {
            char inbuffer[1024];
            ssize_t n = recv(sockfd, inbuffer, sizeof(inbuffer) - 1, 0);
            if (n > 0)
            {
                inbuffer[n] = 0;
                std::cout << clientaddr << inbuffer << std::endl;
                std::string result = _func(inbuffer);
                send(sockfd, result.c_str(), result.size(), 0);
                // std::string echo_string = "[server echo]# ";
                // echo_string += inbuffer;

                // write(sockfd, echo_string.c_str(), echo_string.size());
            }
            else if (n == 0)
            {
                // client 退出&&关闭连接了
                LOG(INFO, "%s quit\n", clientaddr.c_str());
                break;
            }
            else
            {
                LOG(ERROR, "read error\n", clientaddr.c_str());
                break;
            }
            // sleep(5);
            // break;
        }
        std::cout << "server开始退出" << std::endl;
        shutdown(sockfd, SHUT_RD);
        std::cout << "shut _ rd " << std::endl;
        sleep(10);
        // shutdown(sockfd, SHUT_WR);
        // std::cout << "shut _ wr " << std::endl;
        //::close(sockfd); // 文件描述符泄漏
    }
    static void *HandlerSock(void *args)
    {
        // 线程分离，不用主线程回收
        pthread_detach(pthread_self()); // pthread_self()获取当前线程自己的UID
        ThreadData *td = static_cast<ThreadData *>(args);
        td->self->service(td->sockfd, td->clientaddr);
        delete td; // 每个客户端退出后，线程资源释放掉
        return nullptr;
    }
    // 启动
    void Loop()
    {
        _isrunning = true;
        while (_isrunning)
        {
            // 4. 不能直接接受数据，先获取连接
            struct sockaddr_in peer; // 谁请求的连接
            socklen_t len = sizeof(peer);
            int sockfd = ::accept(_listensockfd, (struct sockaddr *)&peer, &len);
            // 连接成功的话，就分配一个新的sockfd
            if (sockfd < 0)
            {
                LOG(WARNING, "accept error\n"); // 如果accept失败，只是一个WARNING而已，该客户连接失败而已，while循环下一个
                continue;
            }

            // // verson0: 一次只能请求一个客户端，一个客户端用完，才能连接下一个
            // service(sockfd, InetAddr(peer)); // 卡在servicewhile里面出不来，只能处理一个客户端

            // // Version 1: 采用多进程
            // pid_t id = fork();
            // if (id == 0)
            // {
            //     // child
            //     ::close(_listensockfd);
            //     // 创建孙子进程，将sockfd交给孙子处理
            //     if (fork() > 0)
            //         exit(0);
            //     // 孙子  成为了孤儿进程，系统领养，不用关心死活
            //     service(sockfd, InetAddr(peer));
            //     exit(0);
            // }
            // // father
            // ::close(sockfd);
            // waitpid(id, nullptr, 0);

            // version 2: 采用多线程
            pthread_t tid;
            ThreadData *td = new ThreadData(sockfd, InetAddr(peer), this); // 每个线程客户端都要配一份，堆开辟
            pthread_create(&tid, nullptr, HandlerSock, td);                // 线程分离，不用管回收

            // // vesion 3: 采用线程池
            // task_t t = std::bind(&TcpServer::service, this, sockfd, InetAddr(peer));
            // ThreadPool<task_t>::getInstance()->Enqueue(t); // 线程池拿到task_t t 进行t()进行处理任务，多个线程执行多个service
        }
        _isrunning = false;
    }
    ~TcpServer()
    {
        // 关闭listen套接字
        if (_listensockfd > gdefaultsockfd)
            ::close(_listensockfd);
    }

private:
    int _listensockfd;
    uint16_t _port;
    bool _isrunning;
    func_t _func;
};
